// TOWN SCRIPT
//    Town 5: Castle Putideum L2

// This is the special encounter script for this town.
// The states INIT_STATE, EXIT_STATE, and START_STATE have
// meanings that are described in the documenation. States you write
// yourself should be numbered from 10-100.

begintownscript;

variables;

int i,j,k,choice;
string dlgstr;

body;

beginstate INIT_STATE;
	set_crime_tolerance(1);
	
	change_blocked(15,34,1);
	change_blocked(16,34,1);
	change_blocked(17,34,1);
	change_blocked(18,34,1);
	change_blocked(15,35,1);
	change_blocked(16,35,1);
	change_blocked(17,35,1);
	change_blocked(18,35,1);
	
	change_blocked(10,32,1);
	change_blocked(10,33,1);
	change_blocked(10,34,1);
	change_blocked(10,35,1);
	
	change_blocked(11,30,1);
	change_blocked(12,30,1);
	change_blocked(13,30,1);
	change_blocked(14,30,1);
	change_blocked(11,31,1);
	change_blocked(12,31,1);
	change_blocked(13,31,1);
	change_blocked(14,31,1);
	
	change_blocked(23,19,1);
	change_blocked(24,19,1);
	change_blocked(25,19,1);
	change_blocked(23,20,1);
	change_blocked(24,20,1);
	change_blocked(25,20,1);
	
	change_blocked(7,10,1);
	change_blocked(8,10,1);
	change_blocked(9,10,1);
	change_blocked(10,10,1);
	change_blocked(11,10,1);
	change_blocked(12,10,1);
	
	change_blocked(8,18,1);
	change_blocked(9,18,1);
	change_blocked(10,18,1);
	change_blocked(11,18,1);
	
	change_blocked(7,4,1);

	set_name(6,"Putidus");
	set_name(14,"Collatinus");
	set_char_dialogue_pic(14,1949,0);
	set_name(18,"Faustulus");
	set_char_dialogue_pic(18,1957,0);
	set_name(19,"Sextus");
	set_name(20,"Gaius");

	if (get_flag(6,0) != 0)
		erase_char(13);
	
	if (get_flag(5,13) != 0)
		erase_char(14);
		
	if (get_flag(250,2) != 0) {
		erase_char(6);
		erase_char(7);
		erase_char(8);
		erase_char(9);
		erase_char(10);
		erase_char(11);
		erase_char(12);
		erase_char(18);
		}

	if (get_flag(5,0) == 0) {
		force_instant_terrain_redraw();
		set_flag(5,0,1);
		message_dialog("You ascend the stairs, the steps echoing resonantly with your steps. The long staircase leads you to a new level of the tower, one even colder and blacker than the previous.","");
		}
break;

beginstate EXIT_STATE;
// Always called when the town is left.
break;

beginstate START_STATE;
if ((get_crime_level() > 0) && (get_flag(250,4) == 0)) {
		set_flag(250,4,1);
		message_dialog("You feel a chill come over you. The gods have seen your crimes, and they will certainly punish you. The only questions are when and how.","");
		}
break;

beginstate 10;
if (get_flag(250,2) != 0)
	end();

	if (get_flag(5,1) == 0) {
		set_flag(5,1,1);
		clear_buffer();
		append_string("_Welcome, adventurer");
		if (party_size() > 1)
			append_string("s");
		append_string("!_ his voice booms, so deep and loud that all the hall resounds. _You are expected, ");
		i = 0;
		while (char_ok(i) == 0)
			{i = i + 1; }
		append_char_name(i);
		append_string(". Come, let us talk._");
		get_buffer_text(dlgstr);
		message_dialog("You step into Lord Putidus's throne room. Evidently the rumors that something had happened to him were wrong, because he is standing before his throne in front of you, preceded by an array of ravening, dread beasts.",dlgstr);
		}
	
	if ((get_flag(6,0) != 0) && (get_flag(5,8) == 0)) {
		set_flag(5,8,1);
		message_dialog("As you enter the throne room, Lord Putidus sees you, and his face twists with anger. _Trying to escape?_ he screams. _Guards! Attack!_","The guards in front of you attack, joined by a number of guards who appear behind you. This may not have been the best idea.");
		activate_hidden_group(1);
		make_town_hostile();
		}
break;

beginstate 11;
if (get_flag(5,2) != 0)
	end();
	
	i = 0;
	while (char_ok(i) == 0)
		{i = i + 1; }
	
	set_flag(5,2,1);
	message_dialog("Lord Putidus stands before his terrible iron throne, his face bloodlessly pale as ivory, the rest shrouded in a black cloak. He holds a staff with a small blade in the top, a farming implement that you recognize.","");
	
	text_bubble_on_char(6,"I am glad that you have made it here.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"I am Lord Putidus.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"Would you care to explain");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"why you have come?");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	force_instant_terrain_redraw();
	
	reset_dialog();
	add_dialog_str(0,"What do you say?",0);
	add_dialog_choice(0,"(Tell him that you were sent to find out if he was okay.)");
	add_dialog_choice(1,"(Tell him that you have come to free the stolen townspeople.)");
	add_dialog_choice(2,"Stand silent.");
	choice = run_dialog(1);
	
	set_flag(5,3,choice);
	
	if (choice == 3) {
		message_dialog("Lord Putidus stares at you. You stare back at him defiantly, refusing to say anything. Eventually he breaks the silence.","");
		
		text_bubble_on_char(6,"Since you do not answer,");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"I must assume your intentions");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"are ill.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"But you will not detract");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"from my happiness,");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"for your timing is fortunate.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		}
		
	if (choice == 2) {
		text_bubble_on_char(6,"I must admit that I have not yet");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"learned all that I might");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"of the empire's ways,");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"but is it customary where you are from");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"for a guest to insult his host?");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		force_instant_terrain_redraw();
		
		reset_dialog();
		add_dialog_str(0,"What do you say?",0);
		add_dialog_choice(0,"No more customary than for a lord to rape his subjects' wives!");
		add_dialog_choice(1,"No, it is not. I am sorry.");
		if (run_dialog(1) == 1) {
			message_dialog("Lord Putidus roars at this insult. _Guards! Attack!_ he shouts. They speak strange prayers to gods that make you feel weak even as they begin to attack you.","You may have gone too far.");
			make_town_hostile();
			set_char_status(1000,3,-25,1,0);
			end();
			}
		
		text_bubble_on_char(6,"I will forgive you,");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"because I am in a wonderful mood.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		}
		
	if (choice == 1) {
		text_bubble_on_char(6,"Your concern is");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"touching.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"As you can see,");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"I am as well as always.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		force_instant_terrain_redraw();
		
		reset_dialog();
		add_dialog_str(0,"What do you say?",0);
		add_dialog_choice(0,"(Nothing.)");
		add_dialog_choice(1,"But you are so pale! Are you sure you're well?");
		if (run_dialog(1) == 2) {
			text_bubble_on_char(6,"Yes, I'm fine.");
			force_instant_terrain_redraw();
			pause(5 * get_flag(251,0));
			
			text_bubble_on_char(6,"");
			text_bubble_on_char(6,"You need not worry about me,");
			force_instant_terrain_redraw();
			pause(5 * get_flag(251,0));
			
			text_bubble_on_char(6,"");
			text_bubble_on_char(6,"I promise you that.");
			force_instant_terrain_redraw();
			pause(5 * get_flag(251,0));
			}
		
		}
		
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"In fact, you find me");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"in a joyous hour.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"I take this day a wife.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	
	set_terrain(7,4,16);
	run_animation_sound(58);
	
	relocate_character(13,7,5);
	force_instant_terrain_redraw();
	pause(2 * get_flag(251,0));
	
	relocate_character(13,7,6);
	force_instant_terrain_redraw();
	pause(2 * get_flag(251,0));

	relocate_character(13,7,7);
	force_instant_terrain_redraw();
	pause(2 * get_flag(251,0));
	
	relocate_character(13,8,7);
	set_character_facing(13,6);
	force_instant_terrain_redraw();
	
	message_dialog("You stare in horror. The woman who has just walked in, slowly, calmly, without hesitation, is Lucretia. She stands fair as fresh snow on the wintry peaks of the Carpathians, as white as the summer's clouds when rain is yet an imagined thing.","She is even more fair here, in this dark castle, than she was in Umbratium. She shows no signs of fear or anger for having been stolen by Putidus. Is it possible that she wants to be here?");
	
	text_bubble_on_char(6,"Is she not amazing?");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"Have you ever seen");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"such pure white skin?");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"And she will be purer still,");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"for marriage gives virtue to us all.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	force_instant_terrain_redraw();
	
	message_dialog("Lord Putidus embraces Lucretia, his left cheek sliding down hers, until his face is almost on her shoulder. Her eyes close, her arms loosely around him, her thin lips gently parted, breathing in fits and starts.","When, some time later, they part, she looks even more fair, more white, and more beautiful.");

	if (party_size() > 1)
		text_bubble_on_char(6,"And as for you, guests,");
	else
		text_bubble_on_char(6,"And as for you, guest,");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"I am afraid that you will find");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"that my purse of golden words");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"is spent.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"I have a use for you,");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"but not yet.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"GUARDS!");
	force_instant_terrain_redraw();
	
	set_character_facing(7,0);
	set_character_facing(8,0);
	set_character_facing(9,0);
	set_character_facing(10,0);
	set_character_facing(11,0);
	set_character_facing(12,0);
	run_animation_sound(18);
	
	pause(4 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"Take them away!");
	force_instant_terrain_redraw();
	pause(4 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	force_instant_terrain_redraw();
	
	reset_dialog();
	add_dialog_str(0,"The monstrous creatures start moving towards you, presumably to drag you away. What do you do?",0);
	add_dialog_choice(0,"(Go willingly.)");
	if (party_size() > 1)
		add_dialog_choice(1,"You won't get away with this! We are citizens of the empire! (Struggle.)");
	else
		add_dialog_choice(1,"You won't get away with this! I am a citizen of the empire! (Struggle.)");
	if (party_size() > 1)
		add_dialog_choice(2,"We refuse to go! You must release your captives immediately! (Fight.)");
	else
		add_dialog_choice(2,"I refuse to go! You must release your captives immediately! (Fight.)");
	choice = run_dialog(1);
	if (choice == 3) {
		message_dialog("Your brave words do not go unnoticed. The monsters attacking you utter words of dark witchcraft, and you feel sluggish.","");
		make_town_hostile();
		set_char_status(1000,3,-25,1,0);
		end();
		}
	if (choice == 2) {
		message_dialog("You shout and struggle and fight, but all your courage gets you is a number of bumps and scratches.","");
		damage_char(1000,get_ran(7,1,6),0);
		}
	
	move_to_new_town(0,6,12);
	
break;

beginstate 12;
if (get_flag(5,4) == 0) {
	message_dialog("These doors are barred from this side. You lift the bar out of the way, so that you can pass through these doors freely.","");
	set_flag(5,4,1);
	}
break;

beginstate 13;
	reset_dialog_preset_options(5);
	add_dialog_choice(1,"Descend the stairs.");
	if (run_dialog(1) == 2)
		move_to_new_town(0,24,23);
break;

beginstate 14;
	block_entry(1);
	message_dialog("You approach the trapdoor, but you can't bring yourself to go back down to the hellish environment that you left. You leave the trapdoor alone.","");
break;

beginstate 15;
if (get_flag(5,5) == 0) {
	reset_dialog();
	add_dialog_str(0,"You enter a new part of Castle Putideum, much higher than the pit into which you were thrown. You have righted the situation down there and fulfilled the obligations of pietas, like a true citizen of the empire.",0);
	add_dialog_str(1,"Next you must bring the justice of the empire to Lord Putidus, who has committed these terrible crimes. Proper imperial values and procedures must be restored to this place.",0);
	add_dialog_str(2,"But as you walk through these doors, you see Collatinus! He is in shackles on the other side of this room, and he groans painfully as you enter. You should speak to him.",0);
	set_flag(5,5,run_dialog(1));
	}
break;

beginstate 16;
	reset_dialog_preset_options(5); // stairs
	add_dialog_str(0,"The staircase continues to wind for quite some time. Do you wish to continue up?",0);
	if (run_dialog(1) == 1)
		block_entry(1);
	else
		move_to_new_town(7,6,18);
break;

beginstate 17;
if (get_flag(5,6) == 0) {
	block_entry(1);
	message_dialog("You can't just leave Collatinus here. You must speak to him before you go. Basic decency and all of the values of virtue demand it of you.","");
	}
break;

beginstate 18;
if (get_flag(7,2) == 0) {
	block_entry(1);
	message_dialog("You start to walk north, but then you remember that Collatinus said that Lucretia was to the south. You have to check on her first.","");
	end();
	}
	
if (get_flag(5,7) == 0) {
	block_entry(1);
	message_dialog("You start to walk north, but you realize that you really need to tell Collatinus what happened to Lucretia before you move on. The man should know.","");
	}
break;

beginstate 19;
if (get_flag(5,9) == 0) {
	message_dialog("These doors are barred from this side. You lift the bar out of the way, so that you can pass through these doors freely.","");
	set_flag(5,9,1);
	}
break;

beginstate 20;
if (get_flag(5,10) == 0) {
	message_dialog("Beyond this door, you see Faustulus, of all people! The empire's agent in Ateria is here in Castle Putideum. He sits at his desk, his face buried in his hands, not even acknowledging your presence.","");
	set_flag(5,10,1);
	}
break;

beginstate 21;
if (get_flag(250,2) != 0)
	end();
	
	block_entry(1);
	
	reset_dialog();
	add_dialog_str(0,"You reach the door to Putidus's throne room. Do you wish to proceed and attack Putidus?",0);
	add_dialog_choice(0,"Leave.");
	add_dialog_choice(1,"Open the door and attack.");
	if (run_dialog(1) == 1) {
		block_entry(1);
		end();
		}
	
	set_flag(250,2,1);
	
	i = 0;
	while (char_ok(i) == 0)
		{i = i + 1; }
	
	march_party(7,4);
	force_view_center(7,4);
	force_instant_terrain_redraw();
	pause(1 * get_flag(251,0));	
	
	set_terrain(7,4,16);
	run_animation_sound(58);
	
	message_dialog("You charge into Putidus's throne room, weapons in hand, ready to fight him in mortal contest of arms, to cast him down into the fiery lake which he made below the castle in which he does unholy things.","");
	
	march_party(7,5);
	force_view_center(7,5);
	force_instant_terrain_redraw();
	pause(1 * get_flag(251,0));
	
	set_character_facing(6,2);
	set_character_facing(7,0);
	set_character_facing(8,0);
	set_character_facing(9,0);
	set_character_facing(10,0);
	set_character_facing(11,0);
	set_character_facing(12,0);
	
	march_party(7,6);
	force_view_center(7,6);
	force_instant_terrain_redraw();
	pause(1 * get_flag(251,0));
	
	j = 0;
	while (j <= 18) {
		set_character_pose(j,2);
		j = j + 1;
		}
	march_party(7,7);
	force_view_center(7,7);
	run_animation_sound(18);
	
	message_dialog("You stand for a moment, your weapons drawn, staring at Putidus. No shock registers in his face. In fact, you can see nothing at all, no human emotions whatsoever, making their mark on his visage. He stares at you.","Then he begins to laugh, a billowing sound that reverberates throughout the whole room.");
	
	clear_buffer();
	append_string("Really, now, ");
	append_char_name(i);
	append_string(",");
	get_buffer_text(dlgstr);
	
	text_bubble_on_char(6,dlgstr);
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"I expected more from you.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"Charging in and trying to kill me?");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"Ha!");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"How can you possibly expect to succeed?");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	force_instant_terrain_redraw();
	
	reset_dialog();
	add_dialog_str(0,"What do you say?",0);
	add_dialog_choice(0,"(Stand defiantly silent.)");
	add_dialog_choice(1,"Your treachery is at an end, Putidus!");
	add_dialog_choice(2,"Because I know something you don't know.");
	choice = run_dialog(1);
	
	if (get_flag(250,4) != 0) {
		text_bubble_on_char(6,"Unfortunately for both of us,");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"you have committed terrible crimes");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"here in the castle.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"If you are not morally clean,");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"you are of no use to me.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"Therefore...");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"you must die.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"GUARDS!");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		force_instant_terrain_redraw();
		
		message_dialog("The guards turn towards you, and they charge. You are torn to pieces in moments.","");
		
		kill_char(1000,2,0);
		end();
		}
	
	if (choice == 1) {
		pause(5 * get_flag(251,0));
		
		message_dialog("You stare at Lord Putidus. He stares back at you, unchanged. Finally he laughs again.","");
		
		clear_buffer();
		append_string("Give up now, ");
		append_char_name(i);
		append_string(",");
		get_buffer_text(dlgstr);
		
		text_bubble_on_char(6,dlgstr);
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"before you doom yourself wholly.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"You cannot resist;");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		}
		
	if (choice == 2) {
		message_dialog("He laughs heartily at your exclamation.","");
		
		text_bubble_on_char(6,"Bold and courageous.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"Stupid, but bold and courageous.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"That will get you a place");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"in the legends,");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"I am sure.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"But you cannot resist;");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		}
		
	if (choice == 3) {
		message_dialog("He stops for a moment, his confident laugh interrupted, but then he laughs again.","");
		
		text_bubble_on_char(6,"What could you possibly know");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"that could be hidden from me?");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"Nothing you have done has been so;");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		}
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"all your actions in Ateria so far");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"have been planned and approved by me.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	force_instant_terrain_redraw();
	
	reset_dialog();
	add_dialog_str(0,"What do you say?",0);
	add_dialog_choice(0,"(Stand defiantly silent.)");
	add_dialog_choice(1,"That's impossible!");
	add_dialog_choice(2,"How do you mean?");
	choice = run_dialog(1);
	
	if (choice == 2) {
		text_bubble_on_char(6,"It is quite possible, I assure you.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		}
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"Who do you think gave the order");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"for you to come here?");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"I wanted you to come.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"I NEEDED you to come.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	force_instant_terrain_redraw();
	
	reset_dialog();
	add_dialog_str(0,"What do you say?",0);
	add_dialog_choice(0,"(Stand silent.)");
	add_dialog_choice(1,"Why? To what end?");
	choice = run_dialog(1);
	
	text_bubble_on_char(6,"");
	if (choice == 2)
		text_bubble_on_char(6,"Because I need your strength.");
	else
		text_bubble_on_char(6,"I need your strength.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	force_instant_terrain_redraw();
	
	reset_dialog();
	add_dialog_str(0,"He continues, _You know by now that I am a vampire; I drink life, gaining power from it, but imbibing the weak gives me little strength. I need to drain the strong.",0);
	add_dialog_str(1,"_I threw you in prison as a test: if you could escape, you had the fortitude to feed me well. It is not only physical strength that I desire from my sustenance, but virtus: virtue, manliness. I drain these from them whom I drink, too.",0);
	add_dialog_str(2,"_That leaves them like Scaevola, like Collatinus, like Lucretia: empty._ He smiles -- but no, the word is too kind for the malevolent expression that presses his lips like gnarled branches towards his gleaming eyes.",0);
	add_dialog_str(3,"What do you say?",0);
	add_dialog_choice(0,"(Stand silent.)");
	add_dialog_choice(1,"Why did you harm Lucretia, you fiend?");
	if (run_dialog(1) == 2) {
		text_bubble_on_char(6,"Her case was all too easy:");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"I merely tempted her,");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"and I let her do the rest.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		force_instant_terrain_redraw();
		
		reset_dialog();
		add_dialog_str(0,"_She was bored in Umbratium. I offered her excitement, so she came with me. Once here, I drained her. She became as you saw. She is dead?_ You nod. _I did not kill her. She killed herself. My hands are clean._",0);
		add_dialog_choice(0,"(Stand silent.)");
		add_dialog_choice(1,"You are responsible! You know you are!");
		add_dialog_choice(2,"But I still don't understand: why did you do it? Why did you hurt Lucretia?");
		choice = run_dialog(1);
		
		if (choice == 3) {
			text_bubble_on_char(6,"Why?");
			force_instant_terrain_redraw();
			pause(5 * get_flag(251,0));
			
			text_bubble_on_char(6,"");
			text_bubble_on_char(6,"Because her life had a daily beauty");
			force_instant_terrain_redraw();
			pause(5 * get_flag(251,0));
			
			text_bubble_on_char(6,"");
			text_bubble_on_char(6,"that made me ugly.");
			force_instant_terrain_redraw();
			pause(5 * get_flag(251,0));
			
			text_bubble_on_char(6,"");
			text_bubble_on_char(6,"I need no other reason.");
			force_instant_terrain_redraw();
			pause(5 * get_flag(251,0));
			
			text_bubble_on_char(6,"");
			force_instant_terrain_redraw();
			}
			
		if (choice == 2)
			message_dialog("Putidus merely smiles again.","");
		}
	
	text_bubble_on_char(6,"By defeating the shades");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"under the castle,");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"you have shown virtus, strength.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"By giving burial to the dead citizens,");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"you have shown pietas, dutifulness.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"By solving the puzzles of the castle,");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"you have shown sagacitas, wisdom.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"And by challenging me to combat,");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"you have again shown virtus, courage.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	if (party_size() > 1)
		text_bubble_on_char(6,"You will be delicious victims indeed.");
	else
		text_bubble_on_char(6,"You will be a delicious victim indeed.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	force_instant_terrain_redraw();
	
	// If they don't have Faustulus's backing, end it.
	if ((get_flag(5,12) == 0) || (char_ok(18) == 0)) {
		message_dialog("_Guards!_ screams Putidus. _Aid me!_ He attacks.","");
		
		make_town_hostile();
		end();
		}
	
	relocate_character(18,11,7);
	set_character_facing(18,2);
	put_boom_on_char(18,2,0);
	run_animation_sound(10);
	
	set_character_facing(6,6);
	text_bubble_on_char(i,"Faustulus!");
	text_bubble_on_char(6,"Faustulus!");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(i,"");
	text_bubble_on_char(6,"");
	text_bubble_on_char(i,"Where have you been?");
	text_bubble_on_char(6,"What are you doing here?");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(i,"");
	text_bubble_on_char(6,"");
	text_bubble_on_char(18,"I know, Putidus.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(18,"");
	text_bubble_on_char(18,"I know what you're planning.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(18,"");
	text_bubble_on_char(18,"I can't let you do it.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(18,"");
	force_instant_terrain_redraw();
	
	reset_dialog();
	add_dialog_str(0,"Putidus stares at Faustulus, confused. Faustulus stares back, obviously terrified, and shaking with the sheer power that he holds within his frame. He has power, but he lacks control.",0);
	add_dialog_str(1,"This is the moment when your gamble must pay off. If Faustulus finds out that you have lied to him, your life is obviously forfeit. Putidus must not be allowed to convince Faustulus that he is wrong.",0);
	add_dialog_str(2,"What do you say?",0);
	add_dialog_choice(0,"(Nothing.)");
	add_dialog_choice(1,"Kill him, Faustulus! He will betray you!");
	if (run_dialog(1) == 2) {
		text_bubble_on_char(i,"Kill him, Faustulus!");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(i,"");
		text_bubble_on_char(i,"He will betray you!");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(i,"");
		text_bubble_on_char(6,"What?");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"Do not listen to this fool!");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"Faustulus, you are the most vital part");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"of my plans.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"All this would fail without you.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"You know that.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		force_instant_terrain_redraw();
		
		message_dialog("Faustulus stops, confused. _Yes,_ he says slowly. _Yes._","");
		
		text_bubble_on_char(18,"Yes, of course.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(18,"");
		text_bubble_on_char(18,"You cannot finish this without me.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(18,"");
		text_bubble_on_char(18,"How could I have been so foolish?");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(18,"");
		text_bubble_on_char(18,"Please, Putidus, forgive me.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(18,"");
		text_bubble_on_char(6,"Have no fears of that.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"Now, where were we?");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		set_character_facing(6,2);
		text_bubble_on_char(6,"");
		text_bubble_on_char(6,"Ah, yes.");
		force_instant_terrain_redraw();
		pause(5 * get_flag(251,0));
		
		text_bubble_on_char(6,"");
		force_instant_terrain_redraw();
		
		message_dialog("With Faustulus's help, Putidus is able to subdue you quickly. You are unable to resist.","");

		kill_char(1000,2,0);
		end();
		}
	
	text_bubble_on_char(18,"It ends here, Putidus.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(18,"");
	force_instant_terrain_redraw();
	
	message_dialog("Putidus barely has time to react. Lightning shoots from Faustulus's fingertips!","");
	
	// New round: kill the demon guards
	
	set_character_pose(18,1);
	
	put_jagged_zap(char_loc_x(18),char_loc_y(18),char_loc_x(7),char_loc_y(7),4);
	put_jagged_zap(char_loc_x(18),char_loc_y(18),char_loc_x(8),char_loc_y(8),4);
	put_jagged_zap(char_loc_x(18),char_loc_y(18),char_loc_x(9),char_loc_y(9),4);
	put_jagged_zap(char_loc_x(18),char_loc_y(18),char_loc_x(10),char_loc_y(10),4);
	put_jagged_zap(char_loc_x(18),char_loc_y(18),char_loc_x(11),char_loc_y(11),4);
	put_jagged_zap(char_loc_x(18),char_loc_y(18),char_loc_x(12),char_loc_y(12),4);
	put_boom_on_char(7,6,0);
	put_boom_on_char(8,6,0);
	put_boom_on_char(9,6,0);
	put_boom_on_char(10,6,0);
	put_boom_on_char(11,6,0);
	put_boom_on_char(12,6,0);
	run_animation_sound(54);
	
	kill_char(7,2,0);
	kill_char(8,2,0);
	kill_char(9,2,0);
	kill_char(10,2,0);
	kill_char(11,2,0);
	kill_char(12,2,0);
	
	set_character_pose(18,2);
	force_instant_terrain_redraw();
	
	// New round: attack Putidus
	
	text_bubble_on_char(6,"What are you doing?");
	
	set_character_pose(18,1);
	
	put_jagged_zap(char_loc_x(18),char_loc_y(18),char_loc_x(6),char_loc_y(6),4);
	put_boom_on_char(6,6,0);
	run_animation_sound(54);
	set_character_pose(18,2);
	force_instant_terrain_redraw();
	
	pause(2 * get_flag(251,0));
	
	// New round: Putidus strikes back as he's hit
	
	text_bubble_on_char(6,"");
	set_character_pose(18,1);
	set_character_pose(6,1);
	
	put_jagged_zap(char_loc_x(18),char_loc_y(18),char_loc_x(6),char_loc_y(6),4);
	put_jagged_zap(char_loc_x(6),char_loc_y(6),char_loc_x(18),char_loc_y(18),4);
	put_boom_on_char(6,6,0);
	put_boom_on_char(18,6,0);
	run_animation_sound(54);
	set_character_pose(18,2);
	set_character_pose(6,2);
	force_instant_terrain_redraw();
	
	// New round: they strike again, and both fall
	set_character_pose(18,1);
	set_character_pose(6,1);
	
	put_jagged_zap(char_loc_x(18),char_loc_y(18),char_loc_x(6),char_loc_y(6),4);
	put_jagged_zap(char_loc_x(6),char_loc_y(6),char_loc_x(18),char_loc_y(18),4);
	put_boom_on_char(6,6,0);
	put_boom_on_char(18,6,0);
	run_animation_sound(54);
	
	message_dialog("Both sides fall, terribly wounded by the blasts. Putidus cries out, as he collapses.","");

	text_bubble_on_char(6,"Faustulus!");
	set_character_pose(18,11);
	set_character_pose(6,11);
	force_instant_terrain_redraw();
	pause(1);
	
	set_character_pose(18,12);
	set_character_pose(6,12);
	force_instant_terrain_redraw();
	pause(1);
	
	set_character_pose(18,13);
	set_character_pose(6,13);
	force_instant_terrain_redraw();
	pause(1);
	
	set_character_pose(18,14);
	set_character_pose(6,14);
	force_instant_terrain_redraw();
	pause(1);
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"You have been lied to!");
	force_instant_terrain_redraw();
	pause(4 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"I was never going to");
	force_instant_terrain_redraw();
	pause(4 * get_flag(251,0));
	
	text_bubble_on_char(6,"");
	text_bubble_on_char(6,"harm you...");
	force_instant_terrain_redraw();
	pause(4 * get_flag(251,0));
	
	put_boom_on_char(6,0,0);
	run_animation_sound(51);
	erase_char(6);
	force_instant_terrain_redraw();
	
	message_dialog("Faustulus falls silent as he lies, and then he suddenly understands. His voice rises, filled with self-recrimination and regret.","");
	
	text_bubble_on_char(18,"Of course!");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(18,"");
	text_bubble_on_char(18,"I was the most necessary part");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(18,"");
	text_bubble_on_char(18,"of his plans.");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(18,"");
	text_bubble_on_char(18,"He could not kill me!");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(18,"");
	text_bubble_on_char(18,"You lied!");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(18,"");
	text_bubble_on_char(18,"And for your lies, I die!");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	clear_buffer();
	append_string("Curse you, ");
	append_char_name(i);
	append_string("!");
	get_buffer_text(dlgstr);
	
	text_bubble_on_char(18,"");
	text_bubble_on_char(18,dlgstr);
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(18,"");
	text_bubble_on_char(18,"A plague upon your entire household!");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(18,"");
	text_bubble_on_char(18,"You have no virtus, no true pietas!");
	force_instant_terrain_redraw();
	pause(5 * get_flag(251,0));
	
	text_bubble_on_char(18,"");
	force_instant_terrain_redraw();
	
	put_boom_on_char(18,0,0);
	run_animation_sound(51);
	erase_char(18);
	force_instant_terrain_redraw();
	
	message_dialog("It is done. Lord Putidus is slain. In the ashes where his body used to lie, there is a small, silver key. You pocket it.","");

	change_spec_item(2,1);
	
	set_character_pose(0,2);
	set_character_pose(1,2);
	set_character_pose(2,2);
	set_character_pose(3,2);
	
break;

beginstate 22;
	message_dialog("This door appears to be totally impenetrable.","");
break;

beginstate 23;
if ((get_flag(5,13) != 0) || (has_special_item(2) == 0))
	end();
	
	reset_dialog();
	add_dialog_str(0,"You approach Collatinus. He hangs limply from his chains, not reacting your presence at all. Your silver key would unlock his chains. What do you do?",0);
	add_dialog_choice(0,"Leave.");
	add_dialog_choice(1,"Free him.");
	if (run_dialog(1) == 1)
		end();
	
	block_entry(1);
	set_flag(5,13,1);
	message_dialog("You unlock him from his chains and tell him that you killed Lord Putidus. He hardly moves. Then, after a time, he looks around and realizes that he is free. He stands and begins moving towards the door.","_Lucretia, I am coming,_ he says, leaving. You hear his voice as he begins up the stairs. _I kissed thee ere I killed thee. No way but this, killing myself, to die upon a kiss._ He is gone, and you are sure he goes to his death.");
	erase_char(14);
	award_party_xp(50,10);
break;

beginstate 24;
if (get_flag(5,14) == 1) {
	print_str("The guard waves you past.");
	end();
	}
if (char_ok(20) == 0)
	end();
if (get_attitude(20) == 10)
	end();
	
	reset_dialog();
	add_dialog_str(0,"_Stop!_ the soldier says. _You there. Do you have permission to be back here? Has Lord Putidus told you that you can come back here?_ His voice catches.",0);
	add_dialog_str(1,"_What? Why are you looking at me like that?_ You didn't realize that you were looking at him in any particular way, but he continues anyway. _You're wondering what I'm doing here, aren't you? Wondering how I ended up working for Putidus._",0);
	add_dialog_str(2,"He sighs. _I was one of the soldiers in Umbratium, years ago. Putidus stole Julia, my wife. He came back later, and I spoke with him. He claimed that she was alive in his tower somewhere, and if I worked for him, he would someday let me see her.",0);
	add_dialog_str(3,"_So I came here. I think Putidus is the only one who knows where exactly my wife is, but she's somewhere in that tower, and he's giving her food and water. I have to protect him, because if anything happened to him, my wife would die._",0);
	add_dialog_str(4,"He sighs again. _That's how I came here. Now, as I was saying, do you have permission to be back here? I have to make sure that you're not going to do anything bad to Lord Putidus; my wife's life depends on it._",0);
	add_dialog_choice(0,"No, I don't have permission to be back here.");
	add_dialog_choice(1,"Yes, of course I have permission. Putidus himself asked me to come back here.");
	if (run_dialog(1) == 1) {
		block_entry(1);
		message_dialog("_Then I'm going to have to ask you to leave,_ he says. _You cannot pass until you get permission from him._ He blocks your way to the door.","");
		}
	else {
		set_flag(5,14,1);
		message_dialog("_Okay, then,_ he says, not suspecting you for a moment. He steps out of your way.","");
		}
break;

beginstate 25;
if (get_flag(5,15) == 1) {
	print_str("The guard waves you past.");
	end();
	}
if (char_ok(19) == 0)
	end();
if (get_attitude(19) == 10)
	end();
	
	reset_dialog();
	add_dialog_str(0,"_Stop right there,_ the guard says. _Are you supposed to be back here? Do you have permission?_",0);
	add_dialog_str(1,"He looks you over. _I have to make sure that nothing happens to Lord Putidus, because he has my boy in his tower somewhere. If Putidus dies, my son, Publius, dies._",0);
	add_dialog_str(2,"He finishes scanning you. _As I was saying, do you have permission to be back here?_",0);
	add_dialog_choice(0,"No, I don't.");
	add_dialog_choice(1,"Yes, I do. Permission from Lord Putidus himself.");
	if (run_dialog(1) == 1) {
		block_entry(1);
		message_dialog("_Then I can't let you pass. Come back when you have permission._ He blocks your way to the door.","");
		}
	else {
		set_flag(5,15,1);
		message_dialog("_All right, then. Go ahead._ He gets out of your way.","");
		}
break;

beginstate 26;
	message_dialog("You look at this body closely and realize that it is the woman that you met in Timoria, Fasa! She said she wanted to leave when the roads were cleared. Putidus must have captured her along the way, brought her here, and...","... and judging by the marks, raped and killed her.");
break;

beginstate 27; // If the party kills Putidus without Faustulus, DEATH
if (get_flag(5,12) != 0)
	end();
	
	message_dialog("You kill Putidus, but as he dies, he speaks strange words to gods you have never heard of, and you feel the ground begin to shake. The castle itself is coming apart!","Within seconds, Castle Putideum collapses on you, and you die.");
	kill_char(1000,2,0);
break;